home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 4
/
FM Towns Free Software Collection 4 - Disc 1.iso
/
data
/
nifhand
/
md.aut
< prev
next >
Wrap
Text File
|
1991-10-18
|
1KB
|
90 lines
LABEL D
IF $900==""
ECHO "\r^G
ログ保存ドライブ名を入力して下さい (例:B) (+リターン)
\r\r\r"
INPUT $900
ENDIF
ECHO "\r^G
ログ保存ドライブ:< $900 >でいいですか? (Y/N) (リターンキー不要) >
\r"
LOOKKEY 60
CASE "Y"
CASE "y"
CASE "N"
$900=""
GOTO D
CASE "n"
$900=""
GOTO D
CASE/TIMEOUT
FREE
ECHO "\r^G
電子メール・BBS・HPなどのログ格納場所を作成しますか?\r"
ECHO "\r これは一度やるだけで結構です (Y/N) (リターンキー不要) >\r"
LOOKKEY 60
CASE "Y"
CASE "y"
CASE "N"
GOTO F
CASE "n"
GOTO F
CASE/TIMEOUT
FREE
CMD ! "MD $900:\\ANN"
CMD ! "MD $900:\\BBS"
CMD ! "MD $900:\\HP"
CMD ! "MD $900:\\MAIL"
LABEL F
ECHO "\r^G
フォーラムのログ格納場所を作成しますか? (Y/N) (リターンキー不要) >
\r"
LOOKKEY 60
CASE "Y"
CASE "y"
CASE "N"
GOTO L
CASE "n"
GOTO L
CASE/TIMEOUT
GOTO L
FREE
LABEL MD
ECHO "\r^G
ログ格納場所を作成したいフォーラム名を入力して下さい (例:FHAND)
\r\r\r"
INPUT $60
ECHO "\r^G
フォーラム名:$60 でいいですか? (Y/N) (E:中止) (リターンキー不要) >
\r"
LOOKKEY 60
CASE "Y"
CASE "y"
CASE "N"
GOTO MD
CASE "n"
GOTO MD
CASE "E"
GOTO L
CASE "e"
GOTO L
CASE/TIMEOUT
GOTO L
FREE
CMD ! "MD $900:\\$60"
ECHO "\r^G
ディレクトリ作成を続行しますか? (Y/N) (リターンキー不要) >
\r"
LOOKKEY 60
CASE "Y"
GOTO MD
CASE "y"
GOTO MD
CASE "N"
CASE "n"
CASE/TIMEOUT
FREE
LABEL L
$60=""
END